functor
import
   Application Browser Module
define
   F = functor export fact:Fact define 
       fun {Fact N}
          if N=<1 then 1 else N*{Fact N-1} end
       end
     end 

   % one way...
   [M]={Module.apply [F] $}
   {Browser.browse {M.fact 5}}

   % ...and another...
   ModMan = {New Module.manager init}
   M2 = {ModMan apply(F $)}
   {Browser.browse {M2.fact 10}}
end
